home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / sd.dir / 00001_Movie Script.ls next >
Encoding:
Text File  |  1996-04-18  |  1.5 KB  |  66 lines
  1. on startMovie
  2.   global cSDSpriteBase, cSDDragSprite, gSDDragging, gSDBinPiece, gSDPuzzlePiece, gSDHelpUp, gSDNoPickUp
  3.   set the exitLock to 1
  4.   set cSDSpriteBase to 1
  5.   set cSDDragSprite to 46
  6.   set gSDDragging to 0
  7.   set gSDNoPickUp to 0
  8.   initPuzzle()
  9.   initBin()
  10.   set vHide to value(HSStateGet("sd2", "not1stTime"))
  11.   put "vHide" && vHide
  12.   if vHide then
  13.     put "Duck1"
  14.     set the visible of sprite 38 to 0
  15.     set gSDHelpUp to 0
  16.   else
  17.     put "Duck2"
  18.     fillBin()
  19.     set gSDHelpUp to 1
  20.   end if
  21.   set vBin to HSStateGet("sd2", "bin")
  22.   if listp(vBin) then
  23.     set gSDBinPiece to vBin
  24.     set vPuzzle to HSStateGet("sd2", "puzzle")
  25.     set gSDPuzzlePiece to vPuzzle
  26.   end if
  27.   repeat with vI = cSDSpriteBase + 1 to cSDSpriteBase + 36
  28.     puppetSprite(vI, 1)
  29.     set the visible of sprite vI to 0
  30.   end repeat
  31.   puppetSprite(cSDDragSprite, 1)
  32.   set the visible of sprite cSDDragSprite to 0
  33.   PlaceBinPieces()
  34.   PlacePuzzlePieces()
  35.   EnableIdleAnim(44, 45)
  36.   if PuzzleComplete() then
  37.     SetCursor(#wait)
  38.     set vInstalled to value(HSStateGet("sd", "installed"))
  39.     if vInstalled then
  40.       go("Finished")
  41.     else
  42.       go("Install2")
  43.     end if
  44.   end if
  45. end
  46.  
  47. on cleanUp
  48.   global gSDBinPiece, gSDPuzzlePiece
  49.   DisableIdleAnim()
  50.   HSStatePut("sd2", "bin", gSDBinPiece)
  51.   HSStatePut("sd2", "puzzle", gSDPuzzlePiece)
  52. end
  53.  
  54. on keyDown
  55.   if the keyCode = 122 then
  56.     LaunchHelp()
  57.   end if
  58. end
  59.  
  60. on NameToNum aName
  61.   global cSDSpriteBase
  62.   set vY to value(char 1 of aName)
  63.   set vX to value(char 3 of aName)
  64.   return ((vY - 1) * 6) + vX + cSDSpriteBase
  65. end
  66.